<script>on mousedownbtnPict short name of meend mousedownon mouseupsend seePicts to this cdbtnPict short name of meend mouseup</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>137</left>
<top>385</top>
<right>224</right>
<bottom>408</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Ultra Bodoni</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Scripts</name>
<script>on mousedownbtnPict short name of meend mousedownon mouseupeditscriptbtnPict short name of meend mouseup</script>
</part>
<part>
<id>1</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>248</left>
<top>19</top>
<right>391</right>
<bottom>50</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>PrimeTitle</name>
<script>on mousedownbtnpict "PrimeTitle"end mousedownon mouseUp xbtnpict "PrimeTitle"if x = 1 then exit mouseupgo to card 1end mouseUp</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>417</left>
<top>385</top>
<right>504</right>
<bottom>408</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>14779</icon>
<textAlign>center</textAlign>
<font>Ultra Bodoni</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Prev</name>
<script>on mousedownbtnPict short name of meend mousedownon mouseupgo to prev cardbtnPict short name of meend mouseup</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>521</left>
<top>385</top>
<right>608</right>
<bottom>408</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>14780</icon>
<textAlign>center</textAlign>
<font>Ultra Bodoni</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mousedownbtnPict short name of meend mousedownon mouseupgo to next cardbtnPict short name of meend mouseup</script>
</part>
<part>
<id>24</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>39</left>
<top>94</top>
<right>266</right>
<bottom>118</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Ultra Bodoni</font>
<textSize>18</textSize>
<textStyle>underline</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>25</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>35</left>
<top>206</top>
<right>606</right>
<bottom>366</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>538</left>
<top>28</top>
<right>626</right>
<bottom>45</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>outline</textStyle>
<textStyle>bold</textStyle>
<name>B&W / Color</name>
<script>on mouseUpglobal cdPICTList,bgPICTList,usecolorhereget line 2 of fld "Color"put not it into line 2 of fld "Color"closecardclosebackgroundif usecolorhere then bgPictClose allif usecolorhere then cdPictClose allput "" into cdPICTListput "" into bgPICTListopenstackopenbackgroundopencardend mouseUp</script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>6</left>
<top>6</top>
<right>126</right>
<bottom>39</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>10</textSize>
<textStyle>outline</textStyle>
<textStyle>bold</textStyle>
<textHeight>13</textHeight>
<name>Color</name>
<script></script>
</part>
<part>
<id>30</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>261</left>
<top>127</top>
<right>381</right>
<bottom>247</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Snake Back</name>
<script></script>
</part>
<name>Prime II (IB)</name>
<script>on closecardset cursor to watchglobal cdPictListcdPictClose allend closecardon bgPictOpen name,frameglobal bgPictListif there is a window name then bgPictClose namepicture name,resource,rect,falseif there is not a window name thenwait 60picture name,resource,rect,falseif there is not a window name then exit bgPictOpenend ifset rect of window name to the rect of bg btn nameput ("0," & (frame-1) * (height of bg btn name)) into thescrollset scroll of window name to thescrollshow window nameput name & return after bgPictListend bgPictOpenon cdPictOpen name,frameglobal cdPictListif there is a window name then cdPictClose namepicture name,resource,rect,falseif there is not a window name thenwait 60picture name,resource,rect,falseif there is not a window name then exit cdPictOpenend ifset rect of window name to the rect of btn nameput ("0," & (frame-1) * (height of btn name)) into thescrollset scroll of window name to thescrollshow window nameput name & return after cdPictListend cdPictOpenon cdPictClose nameglobal cdPictListif name = "all" thenrepeat with a = number of lines in cdPictList down to 1get line a of cdpictlistif it is in windows() then close window itdelete line a of cdPictListend repeatelse if there is a window name thenclose window namerepeat with a = number of lines in cdPictList down to 1get line a of cdpictlistif name = line a of cdPictList thenif it is in windows() then close window itdelete line a of cdPictListend ifend repeatend ifend cdPictCloseon bgPictClose nameglobal bgPictListif name = "all" thenrepeat with a = number of lines in bgPictList down to 1get line a of bgpictlistif it is in windows() then close window itdelete line a of cdPictListend repeatelse if there is a window name thenclose window namerepeat with a = number of lines in bgPictList down to 1get line a of bgpictlistif name = it thenif it is in windows() then close window itdelete line a of bgPictListend ifend repeatend ifend bgPictCloseon btnPict name,frameif there is not a window name then exit btnPictput (item 4 of rect of window name) - (item 2 of rect of window name) into windHeightif frame = "" thenget scroll of window nameif it = "0,0" then put ("0," & windHeight +1) into switch else put "0,0" into switchset scroll of window name to switchelseset scroll of window name to ("0," & (frame-1) * (windHeight))end ifend btnPicton mouseDownInPicture name,whereif there is a bg btn name then put "bg" into typeelse if there is a cd btn name then put "cd" into typeelse pass mouseDownInPictureif the optionkey is down and the commandkey is down thendo ("edit script of "&type&" btn name")exit mousedowninpictureend ifdo ("send mouseDown to "&type&" btn name")repeat until the mouse is updo ("send mouseStillDown to "&type&" btn name")end repeatdo ("send mouseUp to "&type&" btn name")end mouseDownInPictureon moveWindowglobal cdPICTlist,bgPICTlistrepeat with a = 1 to the number of lines in bgPICTlistput line a of bgPICTlist into nameset rect of window name to rect of bg btn nameend repeatrepeat with a = 1 to the number of lines in cdPICTlistput line a of cdPICTlist into nameset rect of window name to rect of cd btn nameend repeatend moveWindowon fullPict nameif there is a window name thenput rect of window name into oldrectput scroll of window name into oldscrollclose window namepicture name,resource,rectset cursor to waitwait until the mouseclickset rect of window name to oldrectset scroll of window name to oldscrollelsepicture name,resource,rectset cursor to waitwait until the mouseclickclose window nameend ifend fullPicton closeallwindowsrepeat with a = the number of lines in the windows down to 1close window (line a of the windows)end repeatend closeallwindows--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--=--on seePictsanswer "There are no PICTs to view on this card."end seePictson editScriptanswer "There are no scripts to edit on this card."end editScript</script>
